home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 001 / pibtscr4.arc / PCDIST.SCR < prev    next >
Encoding:
Text File  |  1986-01-08  |  512 b   |  23 lines
  1. PARAM TT=XK
  2. PARAM TE=2
  3. PARAM MO=17
  4. CLEAR
  5. MESSAGE              "***** DIALING PC DISTRIBUTORS IBBS *****"
  6. DIAL "5"
  7. IF NOT CONNECTED
  8.    MESSAGE           "***** RE-DIALING PC DISTRIBUTORS (IBBS) *****"
  9.    HANGUP
  10.    REDIAL
  11. ENDIF
  12. WAITSTRING "name ?"
  13. STEXT "     ;      |"
  14. WAITSTRING "--->"
  15. STEXT "    |
  16. waitstring ")"
  17. SText "f|"
  18. waitstring "DIR= ALL"
  19. stext "l|"
  20. IF CONNECTED
  21.    EXIT
  22. ENDIF
  23.